home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1985 March / Ahoy_Magazine_85-03_1985_Double_L.d64 / old routine (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  767b  |  25 lines
  1. 90 print"[147]":poke 53280,14:poke 53281,6:print"             old routine"
  2. 100 open2,8,2,"old.obj,p,w"
  3. 105 print#2,chr$(0);:print#2,chr$(128);
  4. 110 for x= 1 to 141:read a
  5. 115 print#2,chr$(a);:next x
  6. 120 close 2:end
  7. 130 data 162,159,160,0,132,251,134,252
  8. 140 data 230,252,232,177,251,145,251
  9. 150 data 200,208,249,224,191,208,242
  10. 160 data 165,1,41,254,133,1,79,76
  11. 170 data 196,162,0,189,28,128,157,190
  12. 180 data 160,232,224,3,208,245,169,55
  13. 190 data 141,28,160,169,128,141,29,160
  14. 200 data 96,0,162,5,189,0,8,240,4,232
  15. 210 data 76,58,128,232,142,1,8,169
  16. 220 data 8,141,2,8,162,7,160,1,132
  17. 230 data 253,134,254,136,230,254,177
  18. 240 data 253,141,55,128,240,6,200,208
  19. 250 data 246,76,85,128,200,177,253,205
  20. 260 data 55,128,240,4,136,76,94,128
  21. 270 data 200,177,253,205,55,128,240,5
  22. 280 data 136,136,76,94,128,165,254,133
  23. 290 data 46,200,200,132,45,166,45,32
  24. 300 data 205,189,76,94,166
  25.